home *** CD-ROM | disk | FTP | other *** search
/ Deutsche Edition 1 / Deutsche Edition 1.iso / amok / 081-090 / amok81 / m2 / defs / graphicsl.def < prev    next >
Text File  |  1993-11-04  |  17KB  |  578 lines
  1. DEFINITION MODULE GraphicsL{"graphics.library",33};
  2. (* 13-Apr-1992/cn *)
  3.  
  4. FROM SYSTEM IMPORT ADDRESS,BITSET,BYTE,LONGSET,WORD;
  5.  
  6. FROM Hardware IMPORT
  7.  BltnodePtr;
  8.  
  9. FROM UtilityD IMPORT
  10.  TagItemPtr;
  11.  
  12. IMPORT
  13.  d:GraphicsD,R;
  14.  
  15. VAR
  16.  graphicsVersion:INTEGER;
  17.  graphicsBase:d.GfxBasePtr;
  18.  
  19. CONST
  20.  graphicsMinVersion=33;
  21.  graphicsName="graphics.library";
  22.  
  23. PROCEDURE AddAnimOb(
  24.            anOb{R.A0}:d.AnimObPtr;
  25.            VAR anKey{R.A1}:d.AnimObPtr;
  26.            rp{R.A2}:d.RastPortPtr); CODE -156;
  27.  
  28. PROCEDURE AddBob(
  29.            Bob{R.A0}:d.BobPtr;
  30.            rp{R.A1}:d.RastPortPtr); CODE -96;
  31.  
  32. PROCEDURE AddFont(textFont{R.A1}:d.TextFontPtr); CODE -480;
  33.  
  34. PROCEDURE AddVSprite(
  35.            vs{R.A0}:d.VSpritePtr;
  36.            rp{R.A1}:d.RastPortPtr); CODE -102;
  37.  
  38. PROCEDURE AllocRaster(
  39.            width{R.D0}:CARDINAL;
  40.            height{R.D1}:CARDINAL):ADDRESS; CODE -492;
  41.  
  42. PROCEDURE AndRectRegion(
  43.            region{R.A0}:d.RegionPtr;
  44.            rectangle{R.A1}:d.RectanglePtr); CODE -504;
  45.  
  46. PROCEDURE AndRegionRegion(
  47.            region1{R.A0}:d.RegionPtr;
  48.            region2{R.A1}:d.RegionPtr):BOOLEAN; CODE -624;
  49.  
  50. PROCEDURE Animate(
  51.            VAR anKey{R.A0}:d.AnimObPtr;
  52.            rp{R.A1}:d.RastPortPtr); CODE -162;
  53.  
  54. PROCEDURE AreaDraw(
  55.            rp{R.A1}:d.RastPortPtr;
  56.            x{R.D0}:INTEGER;
  57.            y{R.D1}:INTEGER):BOOLEAN; CODE -258;
  58.  
  59. PROCEDURE AreaEllipse(
  60.            rp{R.A1}:d.RastPortPtr;
  61.            cX{R.D0}:INTEGER;
  62.            cY{R.D1}:INTEGER;
  63.            a{R.D2}:INTEGER;
  64.            b{R.D3}:INTEGER):BOOLEAN; CODE -186;
  65.  
  66. PROCEDURE AreaEnd(rp{R.A1}:d.RastPortPtr):BOOLEAN; CODE -264;
  67.  
  68. PROCEDURE AreaMove(
  69.            rp{R.A1}:d.RastPortPtr;
  70.            x{R.D0}:INTEGER;
  71.            y{R.D1}:INTEGER):BOOLEAN; CODE -252;
  72.  
  73. PROCEDURE AskFont(
  74.            rp{R.A1}:d.RastPortPtr;
  75.            textAttr{R.A0}:d.TextAttrPtr); CODE -474;
  76.  
  77. PROCEDURE AskSoftStyle(
  78.            rp{R.A1}:d.RastPortPtr):d.FontStyleSet; CODE -84;
  79.  
  80. PROCEDURE AttemptLockLayerRom(
  81.            layer{R.A5}:d.LayerPtr):BOOLEAN; CODE -654;
  82.  
  83. PROCEDURE(*36*) BitMapScale(
  84.                  VAR bitScaleArgs{R.A0}:d.BitScaleArgs); CODE -678;
  85.  
  86. PROCEDURE BltBitMap(
  87.            srcBitMap{R.A0}:d.BitMapPtr;
  88.            srcX{R.D0}:INTEGER;
  89.            srcY{R.D1}:INTEGER;
  90.            dstBitMap{R.A1}:d.BitMapPtr;
  91.            dstX{R.D2}:INTEGER;
  92.            dstY{R.D3}:INTEGER;
  93.            sizeX{R.D4}:INTEGER;
  94.            sizeY{R.D5}:INTEGER;
  95.            minterm{R.D6}:SHORTCARD;
  96.            mask{R.D7}:SHORTCARD;
  97.            tempA{R.A2}:ADDRESS):LONGCARD; CODE -30;
  98.  
  99. PROCEDURE BltBitMapRastPort(
  100.            srcbm{R.A0}:d.BitMapPtr;
  101.            srcX{R.D0}:INTEGER;
  102.            srcY{R.D1}:INTEGER;
  103.            destRp{R.A1}:d.RastPortPtr;
  104.            destX{R.D2}:INTEGER;
  105.            destY{R.D3}:INTEGER;
  106.            sizeX{R.D4}:INTEGER;
  107.            sizeY{R.D5}:INTEGER;
  108.            minterm{R.D6}:SHORTCARD); CODE -606;
  109.  
  110. PROCEDURE BltClear(
  111.            memBlock{R.A1}:ADDRESS;
  112.            bytecount{R.D0}:LONGCARD;
  113.            flags{R.D1}:LONGSET); CODE -300;
  114.  
  115. PROCEDURE BltMaskBitMapRastPort(
  116.            srcbm{R.A0}:d.BitMapPtr;
  117.            srcX{R.D0}:INTEGER;
  118.            srcY{R.D1}:INTEGER;
  119.            destRp{R.A1}:d.RastPortPtr;
  120.            destX{R.D2}:INTEGER;
  121.            destY{R.D3}:INTEGER;
  122.            sizeX{R.D4}:INTEGER;
  123.            sizeY{R.D5}:INTEGER;
  124.            minterm{R.D6}:BYTE;
  125.            bltmask{R.A2}:ADDRESS); CODE -636;
  126.  
  127. PROCEDURE BltPattern(
  128.            rp{R.A1}:d.RastPortPtr;
  129.            mask{R.A0}:ADDRESS;
  130.            xl{R.D0}:INTEGER;
  131.            yl{R.D1}:INTEGER;
  132.            maxX{R.D2}:INTEGER;
  133.            maxY{R.D3}:INTEGER;
  134.            bytecnt{R.D4}:INTEGER); CODE -312;
  135.  
  136. PROCEDURE BltTemplate(
  137.            srcTemplate{R.A0}:ADDRESS;
  138.            srcX{R.D0}:INTEGER;
  139.            srcMod{R.D1}:INTEGER;
  140.            rp{R.A1}:d.RastPortPtr;
  141.            dstX{R.D2}:INTEGER;
  142.            dstY{R.D3}:INTEGER;
  143.            sizeX{R.D4}:INTEGER;
  144.            sizeY{R.D5}:INTEGER); CODE -36;
  145.  
  146. PROCEDURE CBump(c{R.A1}:d.UCopListPtr); CODE -366;
  147.  
  148. PROCEDURE ChangeSprite(
  149.            vp{R.A0}:d.ViewPortPtr;
  150.            s{R.A1}:d.SimpleSpritePtr;
  151.            newdata{R.A2}:ADDRESS); CODE -420;
  152.  
  153. PROCEDURE CINIT(
  154.            copperList{R.A0}:d.UCopListPtr;
  155.            num{R.D0}:LONGINT):d.CopListPtr; CODE -594;
  156. (*
  157.  CINIT ist in C ein Makro dass die Funktion UCopperListInit aufruft.
  158.  Hier ist CINIT so definiert, dass es identisch zu UCopperListInit
  159.  ist.
  160. *)
  161.  
  162. PROCEDURE ClearEOL(rp{R.A1}:d.RastPortPtr); CODE -42;
  163.  
  164. PROCEDURE ClearRectRegion(
  165.            region{R.A0}:d.RegionPtr;
  166.            rectangle{R.A1}:d.RectanglePtr):BOOLEAN; CODE -522;
  167.  
  168. PROCEDURE ClearRegion(region{R.A0}:d.RegionPtr); CODE -528;
  169.  
  170. PROCEDURE ClearScreen(rp{R.A1}:d.RastPortPtr); CODE -48;
  171.  
  172. PROCEDURE ClipBlit(
  173.            src{R.A0}:d.RastPortPtr;
  174.            srcX{R.D0}:INTEGER;
  175.            srcY{R.D1}:INTEGER;
  176.            dest{R.A1}:d.RastPortPtr;
  177.            destX{R.D2}:INTEGER;
  178.            destY{R.D3}:INTEGER;
  179.            xSize{R.D4}:INTEGER;
  180.            ySize{R.D5}:INTEGER;
  181.            minterm{R.D6}:SHORTCARD); CODE -552;
  182.  
  183. PROCEDURE CloseFont(font{R.A1}:d.TextFontPtr); CODE -78;
  184.  
  185. PROCEDURE(*36*) CloseMonitor(
  186.                  monitorSpec{R.A0}:d.MonitorSpecPtr):BOOLEAN; CODE -720;
  187.  
  188. PROCEDURE CMove(
  189.            c{R.A1}:d.UCopListPtr;
  190.            a{R.D0}:ADDRESS;
  191.            v{R.D1}:INTEGER); CODE -372;
  192.  
  193. PROCEDURE CopySBitMap(layer{R.A0}:d.LayerPtr); CODE -450;
  194.  
  195. PROCEDURE CWait(
  196.            c{R.A1}:d.UCopListPtr;
  197.            v{R.D0}:INTEGER;
  198.            h{R.D1}:INTEGER); CODE -378;
  199.  
  200. PROCEDURE DisownBlitter(); CODE -462;
  201.  
  202. PROCEDURE DisposeRegion(region{R.A0}:d.RegionPtr); CODE -534;
  203.  
  204. PROCEDURE DoCollision(rp{R.A1}:d.RastPortPtr); CODE -108;
  205.  
  206. PROCEDURE Draw(
  207.            rp{R.A1}:d.RastPortPtr;
  208.            x{R.D0}:INTEGER;
  209.            y{R.D1}:INTEGER); CODE -246;
  210.  
  211. PROCEDURE DrawEllipse(
  212.            rp{R.A1}:d.RastPortPtr;
  213.            cX{R.D0}:INTEGER;
  214.            cY{R.D1}:INTEGER;
  215.            a{R.D2}:INTEGER;
  216.            b{R.D3}:INTEGER); CODE -180;
  217.  
  218. PROCEDURE DrawGList(
  219.            rp{R.A1}:d.RastPortPtr;
  220.            vp{R.A0}:d.ViewPortPtr); CODE -114;
  221.  
  222. PROCEDURE(*36*) EraseRect(
  223.                  rp{R.A1}:d.RastPortPtr;
  224.                  xMin{R.D0}:INTEGER;
  225.                  yMin{R.D1}:INTEGER;
  226.                  xMax{R.D2}:INTEGER;
  227.                  yMax{R.D3}:INTEGER); CODE -810;
  228.  
  229. PROCEDURE(*36*) ExtendFont(
  230.                  font{R.A0}:d.TextFontPtr;
  231.                  fontTags{R.A1}:TagItemPtr):LONGCARD; CODE -816;
  232.  
  233. PROCEDURE(*36*) FindDisplayInfo(
  234.                  dispID{R.D0}:LONGCARD):d.DisplayInfoHandle; CODE -726;
  235.  
  236. PROCEDURE Flood(
  237.            rp{R.A1}:d.RastPortPtr;
  238.            mode{R.D2}:LONGCARD;
  239.            x{R.D0}:INTEGER;
  240.            y{R.D1}:INTEGER):BOOLEAN; CODE -330;
  241.  
  242. PROCEDURE(*36*) FontExtent(
  243.                  font{R.A0}:d.TextFontPtr;
  244.                  VAR fontExtent{R.A1}:d.TextExtent); CODE -762;
  245.  
  246. PROCEDURE FreeColorMap(colorMap{R.A0}:d.ColorMapPtr); CODE -576;
  247.  
  248. PROCEDURE FreeCopList(coplist{R.A0}:d.CopListPtr); CODE -546;
  249.  
  250. PROCEDURE FreeCprList(cprlist{R.A0}:d.CprlistPtr); CODE -564;
  251.  
  252. PROCEDURE FreeGBuffers(
  253.            anOb{R.A0}:d.AnimObPtr;
  254.            rp{R.A1}:d.RastPortPtr;
  255.            db{R.D0}:BOOLEAN); CODE -600;
  256.  
  257. PROCEDURE FreeRaster(
  258.            p{R.A0}:ADDRESS;
  259.            width{R.D0}:CARDINAL;
  260.            height{R.D1}:CARDINAL); CODE -498;
  261.  
  262. PROCEDURE FreeSprite(pick{R.D0}:INTEGER); CODE -414;
  263.  
  264. PROCEDURE FreeVPortCopLists(vp{R.A0}:d.ViewPortPtr); CODE -540;
  265.  
  266. PROCEDURE GetColorMap(
  267.            entries{R.D0}:LONGINT):d.ColorMapPtr; CODE -570;
  268.  
  269. PROCEDURE(*36*) GetDisplayInfoData(
  270.                  handle{R.A0}:d.DisplayInfoHandle;
  271.                  buf{R.A1}:ADDRESS;
  272.                  size{R.D0}:LONGCARD;
  273.                  tagID{R.D1}:LONGCARD;
  274.                  displayID{R.D2}:LONGCARD):LONGCARD; CODE -756;
  275.  
  276. PROCEDURE GetGBuffers(
  277.            anOb{R.A0}:d.AnimObPtr;
  278.            rp{R.A1}:d.RastPortPtr;
  279.            db{R.D0}:BOOLEAN):BOOLEAN; CODE -168;
  280.  
  281. PROCEDURE GetRGB4(
  282.            colorMap{R.A0}:d.ColorMapPtr;
  283.            entry{R.D0}:LONGINT):LONGINT; CODE -582;
  284.  
  285. PROCEDURE GetSprite(
  286.            sprite{R.A0}:d.SimpleSpritePtr;
  287.            pick{R.D0}:INTEGER):INTEGER; CODE -408;
  288.  
  289. PROCEDURE(*36*) GetVPModeID(
  290.                  vp{R.A0}:d.ViewPortPtr):LONGCARD; CODE -792;
  291.  
  292. PROCEDURE(*36*) GfxAssociate(
  293.                  associateNode{R.A0}:ADDRESS;
  294.                  gfxNodePtr{R.A1}:ADDRESS); CODE -672;
  295.  
  296. PROCEDURE(*36*) GfxFree(gfxNodePtr{R.A0}:ADDRESS); CODE -666;
  297.  
  298. PROCEDURE(*36*) GfxLookUp(
  299.                  associateNode{R.A0}:ADDRESS):ADDRESS; CODE -702;
  300.  
  301. PROCEDURE(*36*) GfxNew(gfxNodeType{R.D0}:LONGCARD):ADDRESS; CODE -660;
  302.  
  303. PROCEDURE InitArea(
  304.            VAR areainfo{R.A0}:d.AreaInfo;
  305.            buffer{R.A1}:ADDRESS;
  306.            maxvectors{R.D0}:INTEGER); CODE -282;
  307.  
  308. PROCEDURE InitBitMap(
  309.            VAR bm{R.A0}:d.BitMap;
  310.            depth{R.D0}:INTEGER;
  311.            width{R.D1}:LONGCARD;
  312.            height{R.D2}:LONGCARD); CODE -390;
  313.  
  314. PROCEDURE InitGels(
  315.            head{R.A0}:d.VSpritePtr;
  316.            tail{R.A1}:d.VSpritePtr;
  317.            gInfo{R.A2}:d.GelsInfoPtr); CODE -120;
  318.  
  319. PROCEDURE InitGMasks(anOb{R.A0}:d.AnimObPtr); CODE -174;
  320.  
  321. PROCEDURE InitMasks(vs{R.A0}:d.VSpritePtr); CODE -126;
  322.  
  323. PROCEDURE InitRastPort(VAR rp{R.A1}:d.RastPort); CODE -198;
  324.  
  325. PROCEDURE InitTmpRas(
  326.            VAR tmpras{R.A0}:d.TmpRas;
  327.            buffer{R.A1}:ADDRESS;
  328.            size{R.D0}:LONGINT); CODE -468;
  329.  
  330. PROCEDURE InitView(VAR view{R.A1}:d.View); CODE -360;
  331.  
  332. PROCEDURE InitVPort(VAR vp{R.A0}:d.ViewPort); CODE -204;
  333.  
  334. PROCEDURE LoadRGB4(
  335.            vp{R.A0}:d.ViewPortPtr;
  336.            colors{R.A1}:ADDRESS;
  337.            count{R.D0}:INTEGER); CODE -192;
  338.  
  339. PROCEDURE LoadView(view{R.A1}:d.ViewPtr); CODE -222;
  340.  
  341. PROCEDURE LockLayerRom(layer{R.A5}:d.LayerPtr); CODE -432;
  342.  
  343. PROCEDURE MakeVPort(
  344.            view{R.A0}:d.ViewPtr;
  345.            viewport{R.A1}:d.ViewPortPtr); CODE -216;
  346.  
  347. PROCEDURE(*36*) ModeNotAvailable(
  348.                  modeID{R.D0}:LONGCARD):LONGCARD; CODE -798;
  349.  
  350. PROCEDURE Move(
  351.            rp{R.A1}:d.RastPortPtr;
  352.            x{R.D0}:INTEGER;
  353.            y{R.D1}:INTEGER); CODE -240;
  354.  
  355. PROCEDURE MoveSprite(
  356.            vp{R.A0}:d.ViewPortPtr;
  357.            sprite{R.A1}:d.SimpleSpritePtr;
  358.            x{R.D0}:INTEGER;
  359.            y{R.D1}:INTEGER); CODE -426;
  360.  
  361. PROCEDURE MrgCop(view{R.A1}:d.ViewPtr); CODE -210;
  362.  
  363. PROCEDURE NewRegion():d.RegionPtr; CODE -516;
  364.  
  365. PROCEDURE(*36*) NextDisplayInfo(
  366.                  displayID{R.D0}:LONGCARD):LONGCARD; CODE -732;
  367.  
  368. PROCEDURE OpenFont(
  369.            textAttr{R.A0}:d.TextAttrPtr):d.TextFontPtr; CODE -72;
  370.  
  371. PROCEDURE(*36*) OpenMonitor(
  372.                  monitorName{R.A1}:ADDRESS;
  373.                  displayID{R.D0}:LONGCARD):d.MonitorSpecPtr; CODE -714;
  374.  
  375. PROCEDURE OrRectRegion(
  376.            region{R.A0}:d.RegionPtr;
  377.            rectangle{R.A1}:d.RectanglePtr):BOOLEAN; CODE -510;
  378.  
  379. PROCEDURE OrRegionRegion(
  380.            region1{R.A0}:d.RegionPtr;
  381.            region2{R.A1}:d.RegionPtr):BOOLEAN; CODE -612;
  382.  
  383. PROCEDURE OwnBlitter(); CODE -456;
  384.  
  385. PROCEDURE PolyDraw(
  386.            rp{R.A1}:d.RastPortPtr;
  387.            count{R.D0}:INTEGER;
  388.            array{R.A0}:ADDRESS); CODE -336;
  389.  
  390. PROCEDURE QBlit(bp{R.A1}:BltnodePtr); CODE -276;
  391.  
  392. PROCEDURE QBSBlit(bsp{R.A1}:BltnodePtr); CODE -294;
  393.  
  394. PROCEDURE ReadPixel(
  395.            rp{R.A1}:d.RastPortPtr;
  396.            x{R.D0}:INTEGER;
  397.            y{R.D1}:INTEGER):LONGINT; CODE -318;
  398.  
  399. PROCEDURE(*36*) ReadPixelArray8(
  400.                  rp{R.A0}:d.RastPortPtr;
  401.                  xstart{R.D0}:CARDINAL;
  402.                  ystart{R.D1}:CARDINAL;
  403.                  xstop{R.D2}:CARDINAL;
  404.                  ystop{R.D3}:CARDINAL;
  405.                  array{R.A2}:ADDRESS;
  406.                  temprp{R.A1}:d.RastPortPtr):LONGINT; CODE -780;
  407.  
  408. PROCEDURE(*36*) ReadPixelLine8(
  409.                  rp{R.A0}:d.RastPortPtr;
  410.                  xstart{R.D0}:CARDINAL;
  411.                  ystart{R.D1}:CARDINAL;
  412.                  width{R.D2}:CARDINAL;
  413.                  array{R.A2}:ADDRESS;
  414.                  tempRP{R.A1}:d.RastPortPtr):LONGINT; CODE -768;
  415.  
  416. PROCEDURE RectFill(
  417.            rp{R.A1}:d.RastPortPtr;
  418.            xMin{R.D0}:INTEGER;
  419.            yMin{R.D1}:INTEGER;
  420.            xMax{R.D2}:INTEGER;
  421.            yMax{R.D3}:INTEGER); CODE -306;
  422.  
  423. PROCEDURE RemFont(textFont{R.A1}:d.TextFontPtr); CODE -486;
  424.  
  425. PROCEDURE RemIBob(
  426.            bob{R.A0}:d.BobPtr;
  427.            rp{R.A1}:d.RastPortPtr;
  428.            vp{R.A2}:d.ViewPortPtr); CODE -132;
  429.  
  430. PROCEDURE RemVSprite(vs{R.A0}:d.VSpritePtr); CODE -138;
  431.  
  432. PROCEDURE(*36*) ScalerDiv(
  433.                  factor{R.D0}:CARDINAL;
  434.                  numerator{R.D1}:CARDINAL;
  435.                  denominator{R.D2}:CARDINAL):CARDINAL; CODE -684;
  436.  
  437. PROCEDURE ScrollRaster(
  438.            rp{R.A1}:d.RastPortPtr;
  439.            dx{R.D0}:INTEGER;
  440.            dy{R.D1}:INTEGER;
  441.            xMin{R.D2}:INTEGER;
  442.            yMin{R.D3}:INTEGER;
  443.            xMax{R.D4}:INTEGER;
  444.            yMax{R.D5}:INTEGER); CODE -396;
  445.  
  446. PROCEDURE ScrollVPort(vp{R.A0}:d.ViewPortPtr); CODE -588;
  447.  
  448. PROCEDURE SetAPen(
  449.            rp{R.A1}:d.RastPortPtr;
  450.            pen{R.D0}:CARDINAL); CODE -342;
  451.  
  452. PROCEDURE SetBPen(
  453.            rp{R.A1}:d.RastPortPtr;
  454.            pen{R.D0}:CARDINAL); CODE -348;
  455.  
  456. PROCEDURE SetCollision(
  457.            num{R.D0}:LONGCARD;
  458.            routine{R.A0}:ADDRESS;
  459.            gInfo{R.A1}:d.GelsInfoPtr); CODE -144;
  460.  
  461. PROCEDURE SetDrMd(
  462.            rp{R.A1}:d.RastPortPtr;
  463.            mode{R.D0}:d.DrawModeSet); CODE -354;
  464.  
  465. PROCEDURE SetFont(
  466.            rp{R.A1}:d.RastPortPtr;
  467.            font{R.A0}:d.TextFontPtr); CODE -66;
  468.  
  469. PROCEDURE SetRast(
  470.            rp{R.A1}:d.RastPortPtr;
  471.            pen{R.D0}:CARDINAL); CODE -234;
  472.  
  473. PROCEDURE SetRGB4(
  474.            vp{R.A0}:d.ViewPortPtr;
  475.            n{R.D0}:CARDINAL;
  476.            r{R.D1}:CARDINAL;
  477.            g{R.D2}:CARDINAL;
  478.            b{R.D3}:CARDINAL); CODE -288;
  479.  
  480. PROCEDURE SetRGB4CM(
  481.            cm{R.A0}:d.ColorMapPtr;
  482.            n{R.D0}:CARDINAL;
  483.            r{R.D1}:CARDINAL;
  484.            g{R.D2}:CARDINAL;
  485.            b{R.D3}:CARDINAL); CODE -630;
  486.  
  487. PROCEDURE SetSoftStyle(
  488.            rp{R.A1}:d.RastPortPtr;
  489.            style{R.D0}:d.FontStyleSet;
  490.            enable{R.D1}:d.FontStyleSet):d.FontStyleSet; CODE -90;
  491.  
  492. PROCEDURE SortGList(rp{R.A1}:d.RastPortPtr); CODE -150;
  493.  
  494. PROCEDURE(*36*) StripFont(font{R.A0}:d.TextFontPtr); CODE -822;
  495.  
  496. PROCEDURE SyncSBitMap(layer{R.A0}:d.LayerPtr); CODE -444;
  497.  
  498. PROCEDURE Text(
  499.            rp{R.A1}:d.RastPortPtr;
  500.            string{R.A0}:ADDRESS;
  501.            count{R.D0}:LONGINT); CODE -60;
  502.  
  503. PROCEDURE(*36*) TextExtent(
  504.                  rp{R.A1}:d.RastPortPtr;
  505.                  string{R.A0}:ADDRESS;
  506.                  count{R.D0}:INTEGER;
  507.                  VAR textExtent{R.A2}:d.TextExtent); CODE -690;
  508.  
  509. PROCEDURE(*36*) TextFit(
  510.                  rp{R.A1}:d.RastPortPtr;
  511.                  string{R.A0}:ADDRESS;
  512.                  strLen{R.D0}:CARDINAL;
  513.                  VAR textExtent{R.A2}:d.TextExtent;
  514.                  constrainingExtent{R.A3}:d.TextExtentPtr;
  515.                  strDirection{R.D1}:INTEGER;
  516.                  constrainBitWidth{R.D2}:CARDINAL;
  517.                  constrainBitHeight{R.D3}:CARDINAL):LONGCARD; CODE -696;
  518.  
  519. PROCEDURE TextLength(
  520.            rp{R.A1}:d.RastPortPtr;
  521.            string{R.A0}:ADDRESS;
  522.            count{R.D0}:INTEGER):INTEGER; CODE -54;
  523.  
  524. PROCEDURE UCopperListInit(
  525.            copperList{R.A0}:d.UCopListPtr;
  526.            num{R.D0}:LONGINT):d.CopListPtr; CODE -594;
  527.  
  528. PROCEDURE UnlockLayerRom(layer{R.A5}:d.LayerPtr); CODE -438;
  529.  
  530. PROCEDURE VBeamPos():LONGINT; CODE -384;
  531.  
  532. PROCEDURE(*36*) VideoControl(
  533.                  VAR colorMap{R.A0}:d.ColorMap;
  534.                  tagarray{R.A1}:TagItemPtr):BOOLEAN; CODE -708;
  535.  
  536. PROCEDURE WaitBlit(); CODE -228;
  537.  
  538. PROCEDURE WaitBOVP(vp{R.A0}:d.ViewPortPtr); CODE -402;
  539.  
  540. PROCEDURE WaitTOF(); CODE -270;
  541.  
  542. PROCEDURE(*36*) WeighTAMatch(
  543.                  reqTextAttr{R.A0}:d.TTextAttrPtr;
  544.                  targetTextAttr{R.A1}:d.TTextAttrPtr;
  545.                  targetTags{R.A2}:TagItemPtr):CARDINAL; CODE -804;
  546.  
  547. PROCEDURE WritePixel(
  548.            rp{R.A1}:d.RastPortPtr;
  549.            x{R.D0}:INTEGER;
  550.            y{R.D1}:INTEGER):BOOLEAN; CODE -324;
  551.  
  552. PROCEDURE(*36*) WritePixelArray8(
  553.                  rp{R.A0}:d.RastPortPtr;
  554.                  xstart{R.D0}:CARDINAL;
  555.                  ystart{R.D1}:CARDINAL;
  556.                  xstop{R.D2}:CARDINAL;
  557.                  ystop{R.D3}:CARDINAL;
  558.                  array{R.A2}:ADDRESS;
  559.                  temprp{R.A1}:d.RastPortPtr):LONGINT; CODE -786;
  560.  
  561. PROCEDURE(*36*) WritePixelLine8(
  562.                  rp{R.A0}:d.RastPortPtr;
  563.                  xstart{R.D0}:CARDINAL;
  564.                  ystart{R.D1}:CARDINAL;
  565.                  width{R.D2}:CARDINAL;
  566.                  array{R.A2}:ADDRESS;
  567.                  tempRP{R.A1}:d.RastPortPtr):LONGINT; CODE -774;
  568.  
  569. PROCEDURE XorRectRegion(
  570.            region{R.A0}:d.RegionPtr;
  571.            rectangle{R.A1}:d.RectanglePtr):BOOLEAN; CODE -558;
  572.  
  573. PROCEDURE XorRegionRegion(
  574.            region1{R.A0}:d.RegionPtr;
  575.            region2{R.A1}:d.RegionPtr):BOOLEAN; CODE -618;
  576.  
  577. END GraphicsL.lib33
  578.